home *** CD-ROM | disk | FTP | other *** search
- %case defineItem%
- %if commandNr > 1023%
- cmd%MenuItemName%% %= %commandNr%;
- %endif%
- %case usesAppDialog%
- %if commandNr > 1023%
- %if dialogExists%
- %if modeless%
- %dlogname%,
- %endif%
- %endif%
- %endif%
- %case usesDocDialog%
- %if commandNr > 1023%
- %if dialogExists%
- %if modal%
- %or modalOneShot%
- %dlogname%,
- %endif%
- %endif%
- %endif%
- %case updateAppMenu%
- %if commandNr > 1023%
- %if dialogExists%
- %if modeless%
- gBartender.EnableCmd (cmd%MenuItemName%);
- %endif%
- %endif%
- %endif%
- %case updateDocMenu%
- %if commandNr > 1023%
- %if dialogExists%
- %if modal%
- %or modalOneShot%
- gBartender.EnableCmd (cmd%MenuItemName%);
- %endif%
- %else%
- gBartender.EnableCmd (cmd%MenuItemName%);
- %endif%
- %endif%
- %case handleAppItem%
- %if commandNr > 1023%
- %if dialogExists%
- %if modeless%
- cmd%MenuItemName%:
- its%dlogname%.GetWindow.Select;
- %endif%
- %endif%
- %endif%
- %case handleDocItem%
- %if commandNr > 1023%
- %if dialogExists%
- %if modal%
- %or modalOneShot%
- cmd%MenuItemName%:
- Do%dlogname% (self);
- %endif%
- %else%
- cmd%MenuItemName%:
- ; {handle %MenuItemName% choice}
- %endif%
- %endif%
-